home *** CD-ROM | disk | FTP | other *** search
/ MacHack 1997 / MacHack 1997.toast / Hacks / Hacks ’96 / PredatorPrey / Range.c < prev    next >
Encoding:
C/C++ Source or Header  |  1996-06-22  |  2.4 KB  |  111 lines  |  [TEXT/KAHL]
  1. /* Range.c -- Modal dialog */
  2. /* Created 940321 20:45 by AppMaker */
  3.  
  4. #include <Types.h>
  5. #include <Quickdraw.h>
  6. #include <Controls.h>
  7. #include <Dialogs.h>
  8. #include <Events.h>
  9. #include <Lists.h>
  10. #include <Menus.h>
  11. #include <TextEdit.h>
  12. #include "ResourceDefs.h"
  13. #include "Miscellany.h"
  14. #include "DialogAids.h"
  15. #include "WindowAids.h"
  16. #include "Range.h"
  17. /*#include "calc_inits.h"*/
  18.  
  19. #define OKButton        1 
  20. #define CancelButton    2 
  21. #define RANGELabel        3 
  22. #define XMinLabel        4 
  23. #define XMaxLabel        5 
  24. #define XScaleLabel        6 
  25. #define YMinLabel        7 
  26. #define YMaxLabel        8 
  27. #define YScaleLabel        9 
  28. #define XResLabel        10 
  29. #define Field11            11 
  30. #define Field12            12 
  31. #define Field13            13 
  32. #define Field14            14 
  33. #define Field15            15 
  34. #define Field16            16 
  35. #define Field17            17 
  36. #define XResRange18Label    18 
  37.  
  38.  
  39. /*----------*/
  40. Boolean GetRange (RangeRec                *Range)
  41. {
  42.     DialogPtr        theDialog;
  43.     GrafPtr            savePort;
  44.     Boolean            result;
  45.     Boolean            done;
  46.     short            itemNr;
  47.     register RangeRecPtr    info;
  48.     ModalFilterUPP    gMyStandardFilterUPP;
  49.     
  50.     GetPort (&savePort);
  51.     InitCursor ();
  52.     theDialog = GetNewDialog (RangeID, nil, (WindowPtr) -1L);
  53.     SetPort (theDialog);
  54.     info = Range;
  55.     SetDText (Field11, info->Field11Text);
  56.     SetDText (Field12, info->Field12Text);
  57.     SetDText (Field13, info->Field13Text);
  58.     SetDText (Field14, info->Field14Text);
  59.     SetDText (Field15, info->Field15Text);
  60.     SetDText (Field16, info->Field16Text);
  61.     SetDText (Field17, info->Field17Text);
  62.     
  63.     ShowWindow (theDialog);
  64.     OutlineButton (1);
  65.     gMyStandardFilterUPP = NewModalFilterProc(StandardFilter);    /*    new    */
  66.     done = false;
  67.     while (!done) {
  68.         
  69.         //ModalDialog (StandardFilter, &itemNr);
  70.         ModalDialog(gMyStandardFilterUPP,&itemNr);
  71.         switch (itemNr) {
  72.             case OKButton:
  73.                     result = true;
  74.                     done = true;
  75.                 break;
  76.             case CancelButton:
  77.                     result = false;
  78.                     done = true;
  79.                 break;
  80.             case Field11:
  81.                     GetDText (itemNr, info->Field11Text);
  82.                 break;
  83.             case Field12:
  84.                     GetDText (itemNr, info->Field12Text);
  85.                 break;
  86.             case Field13:
  87.                     GetDText (itemNr, info->Field13Text);
  88.                 break;
  89.             case Field14:
  90.                     GetDText (itemNr, info->Field14Text);
  91.                 break;
  92.             case Field15:
  93.                     GetDText (itemNr, info->Field15Text);
  94.                 break;
  95.             case Field16:
  96.                     GetDText (itemNr, info->Field16Text);
  97.                 break;
  98.             case Field17:
  99.                     GetDText (itemNr, info->Field17Text);
  100.                 break;
  101.             
  102.         } /* switch */
  103.     } /* while */
  104.     
  105.     DisposDialog (theDialog);
  106.     SetPort (savePort);
  107.     return (result);
  108. } /*GetRange*/
  109.  
  110. /* Range */
  111.